|
PTC Creo Elements/Direct Modeling : Druckmenü
MiBr am 16.03.2016 um 08:02 Uhr (1)
Hallo, ich bins nach mal mit einer Frage zum Drucktool.Anstelle vom drucken, wollte ich mir Pdf´s der Zeichung erstellen und direkt öffnen lassen!Teil der Lisp:(when (or(string= blatt "A0") (string= blatt "DINA0") (string= blatt ".sfeld_rahmen_A0")) (if (and (equal einpassen t) (string= ausr "quer")) (progn (am_plot_ex :Plot_style :pdf_a0 :output_drawing :destination "C: empplot.pdf" :scale :fit :ORIENTATION :landscape :POSITION :CENTER :plot :yes (oli:sd-display-url "C:TEMPplot.pdf") )Dies funzt bei klein ...
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
|
PTC Creo Elements/Direct Modeling : Druckmenü
MiBr am 16.03.2016 um 09:29 Uhr (1)
Ich hatte probehalber die Zeit schon auf 15sekunden erhöht. Gleiches Problem!Wenn ich den Code anschließend ausführe öffnet er das PDF!Gruß Michael
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
AM_PlotAuto-pdf.lsp.txt |
PTC Creo Elements/Direct Modeling : Druckmenü
MiBr am 17.03.2016 um 12:59 Uhr (1)
Hallo,das funzt! Für alle die es gebrauchen können, siehe Anhang.Gruß Michael
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
 |
PTC Creo Elements/Direct Modeling : Druckmenü
MiBr am 18.03.2016 um 12:44 Uhr (15)
Hallo Felix,mir war garnicht bewußt, dass Du Dein Tool extra für mich geändert hattest!BestenDANK für deine Mühe! (schleim )Wenn Du mir sagst, wie ich als Quelle zum drucken noch die Kastenfunktionin das Tool integrieren kann, dann wäre ich zu 100% glücklich mit dem Tool!Also nochmal DankMichael
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
|
PTC Creo Elements/Direct Modeling : Druckmenü
MiBr am 04.04.2016 um 10:37 Uhr (1)
Hallo Wolfgang,funzt super! Über (sd-sys-getenv "USERNAME") konnte ich dann sogar das Problem mit %USERPROFILE% erschlagen!:destination (Format nil "c:users~adesktop~a.pdf" (sd-sys-getenv "USERNAME") (sd-am-inq-drawing-no))Überlege noch eine Auswahl des Zielordner einzubauen. Mal schauen aus welcher LISP ich das klau!Besten Dank Michael
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
|
PTC Creo Elements/Direct Modeling : Druckmenü
MiBr am 04.04.2016 um 12:31 Uhr (1)
Hallo,ich hatte mir vorgestellt vorgestellt, nur den Ordner anzuwählen, Zeichnungsnummer automatisch (sd-am-inq-drawing-no). Also so: Code:(file :value-type :directory:Prompt-text "Ordner zum Speichern angeben":title "Ordner":initial-value nil:initialdirectory (sd-get-current-working-directory))was ich überhaubt nicht hinbekomme, die Auswahl entsprechen im folgenden Code unterzubringen:(if (and(equal einpassen nil) (string= ausr "Hoch"))(progn(am_plot_ex:Plot_style :pdf_a4:output_drawing:destination (Forma ...
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
|
PTC Creo Elements/Direct Modeling : Druckmenü
MiBr am 13.04.2016 um 20:00 Uhr (15)
0
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
|
PTC Creo Elements/Direct Modeling : Druckmenü
MiBr am 14.04.2016 um 09:45 Uhr (1)
So jetzt wäre es noch schön, wenn das Druckfenster nicht schließt wenn kein Blatt gefunden wurde!Kann man das hier intergrieren oder muss der Code an einer anderen Stelle in der Lisp liegen?Hier das Ende vom Code:) ;end if);end when A4;PDF anzeigen(if (equal anzeigen t)(progn(oli:sd-display-url (Format nil "~a~a.pdf" file (sd-am-inq-drawing-no))); open PDF); end Progn PDF anzeigen); end if PDF anzeigen ;end PDF anzeigen(if (not(or(string= blatt "A4") (string= blatt "A3") (string= blatt "A2") (string= blatt ...
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
|
PTC Creo Elements/Direct Modeling : Druckmenü
MiBr am 15.04.2016 um 09:18 Uhr (15)
Besten Danke!!!mal gucken was mir noch so einfällt, bzw. meinen Kollegen Thx. Michael
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
|
PTC Creo Elements/Direct Modeling : Druckmenü
MiBr am 14.12.2017 um 09:16 Uhr (1)
Hallo,ich möchte das Drucktool etwas vereinfachen und hierzu eine local-function benutzen.Diese sieht so aus:Code:(do-plot (plot-style plot-scale plot-ori plot-copie)(am_plot_ex:Plot_style plot-style:scale plot-scale:ORIENTATION plot-ori:POSITION :CENTER:COPIES plot-copie:plot:output_sheet))Leider habe ich ein Problem mit :scale, hier benötige ich einmal mehrere Eingaben:(setf plot-scale :fit) - läuft(setf plot-scale :factor :value 1) - läuft nichtHat da jemand nee einfache Idee? Ich könnte ja auch zwei Fu ...
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
|
PTC Creo Elements/Direct Modeling : Druckmenü
MiBr am 15.12.2017 um 11:17 Uhr (1)
So, ich habs mal mit Refactoring versucht um frischen Wind ins Tool zu bekommen! Leider bekomme ich das mit :SCALE nicht hin, zudem habe ich auch noch verschwiegen,dass ich mit :OUTPUT_SHEET das gleiche Problem habe. Aber da Scale und Output nur 4 Bedingungen bzw. am_plot_ex ergeben, sieht dasgarnicht mehr so schlimm aus.Für weitere Tipps wäre ich sehr DANKBAR!!! Und wo ich gerade dabei bin, also Tipps!Kann man die zwei Punkte für den :Output_pick auch wie im Annotool mittelsRahmen auswählen?Danke nochmal ...
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
|
PTC Creo Elements/Direct Modeling : Druckmenü
MiBr am 16.12.2017 um 12:04 Uhr (1)
Hallo Wolfgang,Zitat:schoen. und DA haettest Du erstmal aufhoeren sollen und nur den vorhanden Code umbauen,NUR umbauen, bis er wieder so funktioniert wie vorher (also April 2016).Hast du aber nicht :(du hast gleichzeitg zum "Umbauen" auch noch 2 Dicke Aenderungen (versucht) einzubauen. DAS machtes sehr unuebersichtlich und ich denke Du verwirssst Dich damit eben auch selbst. Dazu muss ich sagen Jein, denn Code mit den 2 Dicken Änderungen habe ich schon länger imEinsatz und habe Dein Änderungen halt auf di ...
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
